home *** CD-ROM | disk | FTP | other *** search
/ Developer Source 17 / Developer Source Volume 17 (I-MODE Publications, Inc.)(2000).iso / delpp / fig7-10.gif < prev    next >
Graphics Interchange Format  |  1996-11-19  |  35.1 KB  |  640x480  |  4-bit (15 colors)
   ocr: i Delphi 2.0 Bitxor JX File Edit Search View Project Run Component Database Workgroups Tools Help Standard Additional Win95 Dialogs System Data. Access Data Controls 4 - A abll OR DE 2 Form3 L JX Ubject inspector X Form3: TForm3 BITXURF.PAS -OX Properties Events Bitxorf ActiveControl Memol procedure TForm3.ButtoniClick(Sender: TObject); - AutoScroll True +Borderlcons biSystemMenu, begin BorderStyle bsSizeable demol.Lines.Addl"Ine result of 5 xor 15 is I Caption Form3 + - IntTostr(5 xor 15)); ClientHeight 273 end; Clientwidth 427 Color clBtnFace end. CH3D True Cursor crDefault Enabled True +Fon ...